Chip 2007 April/CHIP CD (4 - 2007).iso/beeld/viewers/karsten-setup-3.4.0.exe/{app}/karsten.exe/0/RCDATA/TSAMMLUNGREPAIRFORM/TSAMMLUNGREPAIRFORM.txt

Text File | 2006-11-02 | 6.7 KB | 283 lines

object SammlungRepairForm: TSammlungRepairForm
  Left = 350
  Top = 311
  Caption = 'Repair Broken Links'
  ClientHeight = 416
  ClientWidth = 575
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnResize = FormResize
  DesignSize = (
    575
    416)
  PixelsPerInch = 96
  TextHeight = 13
  object ObjectListLabel: TLabel
    Left = 8
    Top = 8
    Width = 62
    Height = 13
    Caption = '&Broken Links'
    FocusControl = ObjectListGrid
  end
  object Label2: TLabel
    Left = 224
    Top = 296
    Width = 32
    Height = 13
    Caption = 'Label2'
  end
  object OkButton: TBitBtn
    Left = 8
    Top = 384
    Width = 97
    Height = 25
    HelpContext = 908
    Anchors = [akLeft, akBottom]
    Caption = '&OK'
    TabOrder = 2
    Kind = bkOK
  end
  object CancelButton: TBitBtn
    Left = 112
    Top = 384
    Width = 97
    Height = 25
    HelpContext = 909
    Anchors = [akLeft, akBottom]
    Caption = '&Cancel'
    TabOrder = 3
    Kind = bkCancel
  end
  object HelpButton: TBitBtn
    Left = 472
    Top = 384
    Width = 97
    Height = 25
    Hint = 'Open the help file'
    HelpContext = 35
    Anchors = [akRight, akBottom]
    Enabled = False
    TabOrder = 4
    Kind = bkHelp
  end
  object ObjectListGrid: TStringGrid
    Left = 8
    Top = 24
    Width = 561
    Height = 177
    Anchors = [akLeft, akTop, akRight, akBottom]
    ColCount = 4
    DefaultColWidth = 100
    DefaultRowHeight = 18
    FixedCols = 0
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing, goRowSelect, goThumbTracking]
    TabOrder = 0
    OnSelectCell = ObjectListGridSelectCell
  end
  object ProcedurePages: TPageControl
    Left = 8
    Top = 209
    Width = 561
    Height = 169
    ActivePage = ReplacePathSheet
    Anchors = [akLeft, akRight, akBottom]
    TabOrder = 1
    OnChanging = ProcedurePagesChanging
    object ReplacePathSheet: TTabSheet
      Caption = '&Replace Path'
      ExplicitLeft = 0
      ExplicitTop = 0
      ExplicitWidth = 0
      ExplicitHeight = 0
      object SourcePathLabel: TLabel
        Left = 8
        Top = 8
        Width = 66
        Height = 13
        Caption = '&Previous Path'
        FocusControl = SourcePathEdit
      end
      object DestPathLabel: TLabel
        Left = 8
        Top = 56
        Width = 47
        Height = 13
        Caption = '&New Path'
        FocusControl = DestPathEdit
      end
      object SourcePathEdit: TEdit
        Left = 8
        Top = 24
        Width = 449
        Height = 21
        TabOrder = 0
      end
      object DestPathEdit: TEdit
        Left = 8
        Top = 72
        Width = 449
        Height = 21
        TabOrder = 2
      end
      object DestPathButton: TButton
        Left = 464
        Top = 72
        Width = 25
        Height = 21
        Caption = '...'
        TabOrder = 3
        OnClick = DestPathButtonClick
      end
      object ReplaceButton: TButton
        Left = 8
        Top = 104
        Width = 75
        Height = 25
        Caption = '&Replace'
        TabOrder = 4
        OnClick = ReplaceButtonClick
      end
      object TakeObjectButton: TButton
        Left = 464
        Top = 24
        Width = 81
        Height = 21
        Caption = 'From &List'
        TabOrder = 1
        OnClick = TakeObjectButtonClick
      end
    end
    object SearchSheet: TTabSheet
      Caption = '&Search'
      ImageIndex = 2
      DesignSize = (
        553
        141)
      object SearchProgressLabel: TLabel
        Left = 8
        Top = 95
        Width = 78
        Height = 13
        Caption = 'Search Progress'
        Visible = False
      end
      object SearchResultLabel: TLabel
        Left = 8
        Top = 114
        Width = 67
        Height = 13
        Caption = 'Search Result'
        Visible = False
      end
      object SearchPathEdit: TLabeledEdit
        Left = 8
        Top = 24
        Width = 505
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        EditLabel.Width = 47
        EditLabel.Height = 13
        EditLabel.Caption = 'Start &Path'
        TabOrder = 0
        OnChange = SearchPathEditChange
      end
      object SearchPathButton: TButton
        Left = 519
        Top = 24
        Width = 25
        Height = 21
        Anchors = [akTop, akRight]
        Caption = '...'
        TabOrder = 1
        OnClick = SearchPathButtonClick
      end
      object StartSearchButton: TButton
        Left = 8
        Top = 56
        Width = 75
        Height = 25
        Caption = '&Start'
        Enabled = False
        TabOrder = 2
        OnClick = StartSearchButtonClick
      end
      object StopSearchButton: TButton
        Left = 88
        Top = 56
        Width = 75
        Height = 25
        Caption = '&Stop'
        Enabled = False
        TabOrder = 3
        OnClick = StopSearchButtonClick
      end
    end
    object RemoveObjSheet: TTabSheet
      Caption = 'R&emove Items'
      ImageIndex = 1
      ExplicitLeft = 0
      ExplicitTop = 0
      ExplicitWidth = 0
      ExplicitHeight = 0
      object RemoveObjLabel1: TLabel
        Left = 14
        Top = 13
        Width = 218
        Height = 13
        Caption = 'Removes the broken items from the collection.'
      end
      object RemoveObjLabel2: TLabel
        Left = 14
        Top = 32
        Width = 148
        Height = 13
        Caption = 'The image files are not deleted.'
      end
      object RemoveObjButton: TButton
        Left = 14
        Top = 64
        Width = 75
        Height = 25
        Caption = 'R&emove'
        TabOrder = 0
        OnClick = RemoveObjButtonClick
      end
    end
  end
  object DestPathDialog: TOpenPictureDialog
    Filter =
      'All Files (*.png;*.jpg;*.jpeg;*.bmp;*.ico;*.emf;*.wmf)|*.png;*.j' +
      'pg;*.jpeg;*.bmp;*.ico;*.emf;*.wmf|Portable Network Graphics (*.p' +
      'ng)|*.png|JPEG Image (*.jpg)|*.jpg|JPEG Image (*.jpeg)|*.jpeg|Bi' +
      'tmaps (*.bmp)|*.bmp|Icons (*.ico)|*.ico|Enhanced Metafiles (*.em' +
      'f)|*.emf|Windows Metafiles (*.wmf)|*.wmf'
    Options = [ofHideReadOnly, ofPathMustExist, ofEnableSizing]
    Title = 'Select a File From the Destination Folder'
    Left = 200
    Top = 8
  end
  object SearchPathDialog: TJvBrowseForFolderDialog
    Options = [odFileSystemDirectoryOnly, odStatusAvailable, odEditBox, odNewDialogStyle, odNoNewButtonFolder, odValidate]
    Title = 'Select Search Start'
    Left = 232
    Top = 8
  end
  object SearchProcessTimer: TTimer
    Enabled = False
    Interval = 100
    OnTimer = SearchProcessTimerTimer
    Left = 264
    Top = 8
  end
end